home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / E / Exegesis Tools.cpt / Exegesis Tools / background_2180.txt < prev    next >
Text File  |  1990-12-13  |  6KB  |  281 lines
  1. -- background: 2180 from stack: in
  2. -- bmap block id: 2502
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: Compare Back
  6. ----- HyperTalk script -----
  7. on opencard
  8.   --this comes from Stack Developer by Steve Drazga
  9.   put (the number of this card - the number of first card of this background+1) into field "Page Num"
  10. end opencard
  11.  
  12.  
  13. -- part 7 (button)
  14. -- low flags: 00
  15. -- high flags: 2000
  16. -- rect: left=453 top=294 right=322 bottom=490
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 1012 / 1012
  19. -- text alignment: 1
  20. -- font id: 0
  21. -- text size: 12
  22. -- style flags: 0
  23. -- line height: 16
  24. -- part name: Return
  25. ----- HyperTalk script -----
  26. on mouseUp
  27.   visual effect wipe right
  28.   go to card ID 2974
  29. end mouseUp
  30.  
  31.  
  32.  
  33. -- part 13 (field)
  34. -- low flags: 00
  35. -- high flags: 0002
  36. -- rect: left=28 top=69 right=85 bottom=129
  37. -- title width / last selected line: 0
  38. -- icon id / first selected line: 0 / 0
  39. -- text alignment: 0
  40. -- font id: 22
  41. -- text size: 10
  42. -- style flags: 0
  43. -- line height: 13
  44. -- part name: Main Scripture
  45.  
  46.  
  47. -- part 8 (button)
  48. -- low flags: 00
  49. -- high flags: 2000
  50. -- rect: left=22 top=292 right=321 bottom=54
  51. -- title width / last selected line: 0
  52. -- icon id / first selected line: 12042 / 12042
  53. -- text alignment: 1
  54. -- font id: 0
  55. -- text size: 12
  56. -- style flags: 0
  57. -- line height: 16
  58. -- part name: Home
  59. ----- HyperTalk script -----
  60. on mouseUp
  61.   visual effect zoom close
  62.   go Home
  63. end mouseUp
  64.  
  65.  
  66.  
  67. -- part 18 (field)
  68. -- low flags: 00
  69. -- high flags: 0002
  70. -- rect: left=166 top=69 right=85 bottom=267
  71. -- title width / last selected line: 0
  72. -- icon id / first selected line: 0 / 0
  73. -- text alignment: 0
  74. -- font id: 22
  75. -- text size: 10
  76. -- style flags: 0
  77. -- line height: 13
  78. -- part name: Scripture 1
  79.  
  80.  
  81. -- part 10 (field)
  82. -- low flags: 00
  83. -- high flags: 2007
  84. -- rect: left=27 top=95 right=159 bottom=482
  85. -- title width / last selected line: 0
  86. -- icon id / first selected line: 0 / 0
  87. -- text alignment: 0
  88. -- font id: 22
  89. -- text size: 10
  90. -- style flags: 0
  91. -- line height: 13
  92. -- part name: Bible 1
  93.  
  94.  
  95. -- part 14 (field)
  96. -- low flags: 00
  97. -- high flags: 0002
  98. -- rect: left=271 top=69 right=85 bottom=372
  99. -- title width / last selected line: 0
  100. -- icon id / first selected line: 0 / 0
  101. -- text alignment: 0
  102. -- font id: 22
  103. -- text size: 10
  104. -- style flags: 0
  105. -- line height: 13
  106. -- part name: Scripture 2
  107.  
  108.  
  109. -- part 11 (field)
  110. -- low flags: 00
  111. -- high flags: 2007
  112. -- rect: left=26 top=172 right=227 bottom=480
  113. -- title width / last selected line: 0
  114. -- icon id / first selected line: 0 / 0
  115. -- text alignment: 0
  116. -- font id: 22
  117. -- text size: 10
  118. -- style flags: 0
  119. -- line height: 13
  120. -- part name: Bible 2
  121.  
  122.  
  123. -- part 15 (field)
  124. -- low flags: 00
  125. -- high flags: 0002
  126. -- rect: left=379 top=69 right=85 bottom=480
  127. -- title width / last selected line: 0
  128. -- icon id / first selected line: 0 / 0
  129. -- text alignment: 0
  130. -- font id: 22
  131. -- text size: 10
  132. -- style flags: 0
  133. -- line height: 13
  134. -- part name: Scripture 3
  135.  
  136.  
  137. -- part 12 (field)
  138. -- low flags: 00
  139. -- high flags: 2007
  140. -- rect: left=26 top=239 right=295 bottom=481
  141. -- title width / last selected line: 0
  142. -- icon id / first selected line: 0 / 0
  143. -- text alignment: 0
  144. -- font id: 22
  145. -- text size: 10
  146. -- style flags: 0
  147. -- line height: 13
  148. -- part name: Bible 3
  149.  
  150.  
  151. -- part 16 (button)
  152. -- low flags: 00
  153. -- high flags: 2000
  154. -- rect: left=321 top=295 right=318 bottom=352
  155. -- title width / last selected line: 0
  156. -- icon id / first selected line: 6179 / 6179
  157. -- text alignment: 1
  158. -- font id: 0
  159. -- text size: 12
  160. -- style flags: 0
  161. -- line height: 16
  162. -- part name: Next
  163. ----- HyperTalk script -----
  164. on mouseUp
  165.   visual effect wipe right
  166.   go to next card of this bkgnd
  167. end mouseUp
  168.  
  169.  
  170. -- part 17 (button)
  171. -- low flags: 00
  172. -- high flags: 2000
  173. -- rect: left=154 top=294 right=319 bottom=184
  174. -- title width / last selected line: 0
  175. -- icon id / first selected line: 6460 / 6460
  176. -- text alignment: 1
  177. -- font id: 0
  178. -- text size: 12
  179. -- style flags: 0
  180. -- line height: 16
  181. -- part name: Prev
  182. ----- HyperTalk script -----
  183. on mouseUp
  184.   visual effect wipe left
  185.   go to prev card of this bkgnd
  186. end mouseUp
  187.  
  188.  
  189. -- part 19 (button)
  190. -- low flags: 00
  191. -- high flags: 0000
  192. -- rect: left=61 top=296 right=319 bottom=84
  193. -- title width / last selected line: 0
  194. -- icon id / first selected line: 26635 / 26635
  195. -- text alignment: 1
  196. -- font id: 0
  197. -- text size: 12
  198. -- style flags: 0
  199. -- line height: 16
  200. -- part name: How to…
  201. ----- HyperTalk script -----
  202. on mouseUp
  203.   push card
  204.   go to card id 8834
  205. end mouseUp
  206.  
  207.  
  208.  
  209.  
  210. -- part 21 (field)
  211. -- low flags: 01
  212. -- high flags: 0000
  213. -- rect: left=224 top=299 right=317 bottom=284
  214. -- title width / last selected line: 0
  215. -- icon id / first selected line: 0 / 0
  216. -- text alignment: 1
  217. -- font id: 3
  218. -- text size: 12
  219. -- style flags: 0
  220. -- line height: 16
  221. -- part name: page num
  222.  
  223.  
  224. -- part 23 (button)
  225. -- low flags: 00
  226. -- high flags: 2000
  227. -- rect: left=445 top=36 right=70 bottom=478
  228. -- title width / last selected line: 0
  229. -- icon id / first selected line: 22076 / 22076
  230. -- text alignment: 1
  231. -- font id: 0
  232. -- text size: 12
  233. -- style flags: 0
  234. -- line height: 16
  235. -- part name: Delete Card
  236. ----- HyperTalk script -----
  237. on mouseUp
  238.   answer "Delete this card?" with "Cancel" or "Yes"
  239.   if it is "cancel" then exit mouseUp
  240.   set the cursor to 4
  241.   set lockscreen to true
  242.   domenu "delete Card"
  243.   go prev
  244.   set lockScreen to false
  245. end mouseUp
  246.  
  247.  
  248.  
  249. -- part 24 (button)
  250. -- low flags: 00
  251. -- high flags: 2000
  252. -- rect: left=400 top=33 right=65 bottom=437
  253. -- title width / last selected line: 0
  254. -- icon id / first selected line: 1007 / 1007
  255. -- text alignment: 1
  256. -- font id: 0
  257. -- text size: 12
  258. -- style flags: 0
  259. -- line height: 16
  260. -- part name: ImageWriter
  261. ----- HyperTalk script -----
  262. on mouseUp
  263.   answer "Print ‚ÄúComparisons‚Äù Report or Card?" with "Cancel" or "Report" or "Card"
  264.   if it is "Cancel" then
  265.     exit mouseUp
  266.   end if
  267.   if it is "Report" then
  268.     domenu "Print Report..."
  269.     exit mouseUp
  270.   end if
  271.   if it is "Card" then
  272.     open printing with dialog
  273.     if it is empty then
  274.       exit mouseUp
  275.     else
  276.       print this card
  277.       close printing
  278.     end if
  279.   end if
  280. end mouseUp
  281.